﻿Public Class CashBookBUS
    Private cashbookdao As New CashBookDAO()

    Public Function CashBook_Insert(ByVal Start_Date As Date, _
                                    ByVal End_Date As Date) As Double
        Return cashbookdao.CashBook_Insert(Start_Date, End_Date)
    End Function

    Public Sub a1234()
        MessageBox.Show("ok")
    End Sub

    Public Sub a12345()
        MessageBox.Show("ok")
    End Sub

End Class
